
/*
Proposal title: Racial Majority & Minority Group Members' Psychological and Political Reactions to Minority Population Growth

*/

/*
Note:  	The paper has hypotheses about Asian respondents, but as far as I can tell there
		is no question asking whether respondent is Asian besides coding the "other race"
		category as Asian, which is what I did.
*/
		
* Stated-Hyp-1: "I predict that Hispanic population growth will lead Asians, Blacks, and Whites to express more politically conservative positions and ideology, compared with the control prime."

/* 	Test-Hyp-1-16 have the form "Among __A__, those who receive info about Hispanic 
	growth will __B__, compared to those in the control condition" */

	* Test-Hyp-1 - Support reduced immigration : Whites
	
	* Test-Hyp-2 - Support reduced immigration : Blacks

	* Test-Hyp-3 - Support reduced immigration : Asians

	* Test-Hyp-4 - Support increased defense spending : Whites
	
	* Test-Hyp-5 - Support increased defense spending : Blacks

	* Test-Hyp-6 - Support increased defense spending : Asians

	* Test-Hyp-7 - Support higher spending on deportation efforts : Whites
	
	* Test-Hyp-8 - Support higher spending on deportation efforts : Blacks

	* Test-Hyp-9 - Support higher spending on deportation efforts : Asians

	* Test-Hyp-10 - Support for enhanced interrogation : Whites
	
	* Test-Hyp-11 - Support for enhanced interrogation : Blacks

	* Test-Hyp-12 - Support for enhanced interrogation : Asians

	* Test-Hyp-13 - Oppose birthright citizenship : Whites
	
	* Test-Hyp-14 - Oppose birthright citizenship : Blacks

	* Test-Hyp-15 - Oppose birthright citizenship : Asians	

	* Test-Hyp-16 - Conservative self id : Whites
	
	* Test-Hyp-17 - Conservative self id : Blacks

	* Test-Hyp-18 - Conservative self id : Asians		
	
* Stated-Hyp-2: "I will explore whether Asian population growth also leads Whites, Blacks, and Hispanics to express more politically conservative positions and ideology, compared with the control prime"

	* Test-Hyp-19 - Support reduced immigration : Whites
	
	* Test-Hyp-20 - Support reduced immigration : Blacks

	* Test-Hyp-21 - Support reduced immigration : Hispanics

	* Test-Hyp-22 - Support increased defense spending : Whites
	
	* Test-Hyp-23 - Support increased defense spending : Blacks

	* Test-Hyp-24 - Support increased defense spending : Hispanics

	* Test-Hyp-25 - Support higher spending on deportation efforts : Whites
	
	* Test-Hyp-26 - Support higher spending on deportation efforts : Blacks

	* Test-Hyp-27 - Support higher spending on deportation efforts : Hispanics

	* Test-Hyp-28 - Support for enhanced interrogation : Whites
	
	* Test-Hyp-29 - Support for enhanced interrogation : Blacks

	* Test-Hyp-30 - Support for enhanced interrogation : Hispanics

	* Test-Hyp-31 - Oppose birthright citizenship : Whites
	
	* Test-Hyp-32 - Oppose birthright citizenship : Blacks

	* Test-Hyp-33 - Oppose birthright citizenship : Hispanics

	* Test-Hyp-34 - Conservative self id : Whites
	
	* Test-Hyp-35 - Conservative self id : Blacks

	* Test-Hyp-36 - Conservative self id : Hispanics	
	
* Stated-Hyp-3: "I will explore whether cultural/system threat, and group status threat serve as statistical mediators of any observed effects."

	* This is a mediation hypothesis that is presented as conditional on observing
	* effects, and so depends on whether effects are observed.  As shown below
	* there are no significant effects, so nothing here to test.

*****************************************************************************
/* NOTES:

- The race variable available in these data (PPETHM) is mis-labeled. The 
"other" category refers to Asians. Checked against original contract 
documentation.

*/

*****************************************************************************	
clear all
use craig735.dta, clear

/*****************************************************************************
  MEASURES
*****************************************************************************/	

* TREATMENT

gen tr_hispanic = (XTESS222 == 1)

gen tr_asian = (XTESS222 == 2)

gen tr_control = (XTESS222 == 3)

* OUTCOMES

* conservative attitude: immigration
recode Q9 (1=1) (2=2) (3=3) (4=4) (5=5) (*=.),  gen(fewer_immigrants) 

* conservative attitude: defense spending
recode Q10 (1=5) (2=4) (3=3) (4=2) (5=1) (*=.), gen(more_military)

* conservative attitude: spending on deportation efforts
recode Q11 (1=5) (2=4) (3=3) (4=2) (5=1) (*=.), gen(more_deportation)

* conservative attitude: support for "enhanced interrogation"
recode Q12 (1=7) (2=6) (3=5) (4=4) (5=3) (6=2) (7=1) (*=.), gen(yay_torture)

* conservative attitude: opposition to birthright citizenship
recode Q13 (1=7) (2=6) (3=5) (4=4) (5=3) (6=2) (7=1) (*=.), gen(anti_birthright)

* conservative ideological self-id
clonevar conserv_id = Q14 if Q14 != 1


* SUBGROUP
recode PPETHM (1=1) (2=0) (3=0) (4=0) (*=.), gen(white)
recode PPETHM (1=0) (2=1) (3=0) (4=0) (*=.), gen(black)
recode PPETHM (1=0) (2=0) (3=0) (4=1) (*=.), gen(hispanic)
recode PPETHM (1=0) (2=0) (3=1) (4=0) (*=.), gen(otherrace)


/*****************************************************************************
  ANALYSES
*****************************************************************************/	



* test hyp-1
regress fewer_immigrants i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .658
tess 1.tr_hispanic +, init(Craig735) bonf(6)

* test hyp-2
regress fewer_immigrants i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .345
tess 1.tr_hispanic +, bonf(6)

* test hyp-3
regress fewer_immigrants i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .801
tess 1.tr_hispanic +, bonf(6)

* test hyp-4
regress more_military i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .753
tess 1.tr_hispanic +, bonf(6)

* test hyp-5
regress more_military i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .657
tess 1.tr_hispanic +, bonf(6)

* test hyp-6
regress more_military i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .143
tess 1.tr_hispanic +, bonf(6)

* test hyp-7
regress more_deportation i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .152
tess 1.tr_hispanic +, bonf(6)

* test hyp-8
regress more_deportation i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .920
tess 1.tr_hispanic +, bonf(6)

* test hyp-9
regress more_deportation i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .052 -- In CORRECT direction
tess 1.tr_hispanic +, bonf(6)

* test hyp-10
regress yay_torture i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .774
tess 1.tr_hispanic  +, bonf(6)

* test hyp-11
regress yay_torture i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .484
tess 1.tr_hispanic  +, bonf(6)

* test hyp-12
regress yay_torture i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .878
tess 1.tr_hispanic  +, bonf(6)

* test hyp-13
regress anti_birthright i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .406
tess 1.tr_hispanic +, bonf(6)

* test hyp-14
regress anti_birthright i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .495
tess 1.tr_hispanic +, bonf(6)

* test hyp-15
regress anti_birthright i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .289
tess 1.tr_hispanic +, bonf(6)

* test hyp-16
regress conserv_id i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & white == 1
* not supported - p = .284
tess 1.tr_hispanic +, bonf(6)

* test hyp-17
regress conserv_id i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & black == 1
* not supported - p = .483
tess 1.tr_hispanic +, bonf(6)

* test hyp-18
regress conserv_id i.tr_hispanic if (tr_hispanic == 1 | tr_control == 1) & otherrace == 1
* not supported - p = .482
tess 1.tr_hispanic +, bonf(6)

* test hyp-19
regress fewer_immigrants i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .670
tess 1.tr_asian +, bonf(6)

* test hyp-20
regress fewer_immigrants i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .339
tess 1.tr_asian +, bonf(6)

* test hyp-21
regress fewer_immigrants i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .840
tess 1.tr_asian +, bonf(6)

* test hyp-22
regress more_military i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .090 -- Checked and in CORRECT direction
tess 1.tr_asian +, bonf(6)

* test hyp-23
regress more_military i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .337
tess 1.tr_asian +, bonf(6)

* test hyp-24
regress more_military i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .375
tess 1.tr_asian +, bonf(6)

* test hyp-25
regress more_deportation i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .069 - Checked and in CORRECT direction
tess 1.tr_asian +, bonf(6)

* test hyp-26
regress more_deportation i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .656
tess 1.tr_asian +, bonf(6)

* test hyp-27
regress more_deportation i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .681
tess 1.tr_asian +, bonf(6)

* test hyp-28
regress yay_torture i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .274
tess 1.tr_asian +, bonf(6)

* test hyp-29
regress yay_torture i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .329
tess 1.tr_asian +, bonf(6)

* test hyp-30
regress yay_torture i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .483
tess 1.tr_asian +, bonf(6)

* test hyp-31
regress anti_birthright i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .760
tess 1.tr_asian +, bonf(6)

* test hyp-32
regress anti_birthright i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .818
tess 1.tr_asian +, bonf(6)

* test hyp-33
regress anti_birthright i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .984
tess 1.tr_asian +, bonf(6)

* test hyp-34
regress conserv_id i.tr_asian if (tr_asian == 1 | tr_control == 1) & white == 1
* not supported - p = .806
tess 1.tr_asian +, bonf(6)

* test hyp-35
regress conserv_id i.tr_asian if (tr_asian == 1 | tr_control == 1) & black == 1
* not supported - p = .617
tess 1.tr_asian +, bonf(6)

* test hyp-36
regress conserv_id i.tr_asian if (tr_asian == 1 | tr_control == 1) & hispanic == 1
* not supported - p = .105
tess 1.tr_asian +, bonf(6)








